package com.hyj.ecp.backstage.goods.action;

import java.io.File;
import java.io.IOException;
import java.io.OutputStream;
import java.text.SimpleDateFormat;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collections;
import java.util.Comparator;
import java.util.Date;
import java.util.HashMap;
import java.util.Hashtable;
import java.util.Iterator;
import java.util.List;
import java.util.Map;
import java.util.Random;

import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.FileUploadException;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.apache.commons.logging.Log;
import org.apache.commons.logging.LogFactory;
import org.springframework.stereotype.Controller;
import org.springframework.web.bind.annotation.RequestMapping;
import org.springframework.web.bind.annotation.ResponseBody;

import com.hyj.ecp.common.constant.SysConstant;
import com.hyj.util.JsonUtil;

@Controller
@RequestMapping("/backstage/goods/html/*")
public class UploadAction {
	Log logger = LogFactory.getLog(UploadAction.class);
    
	
	@RequestMapping(value="upload.do")
    public void upload(HttpServletRequest request,HttpServletResponse response) throws IOException
    {
		Object obj = doupload(request,response);
        String json = JsonUtil.toJson(obj, false);
        //老的浏览器不识别JSON 格式 会提示下载
        response.setContentType("text/html; charset=UTF-8");
		logger.info("返回参数：" + json);
		OutputStream out  = response.getOutputStream();;
		
		out.write(json.getBytes("UTF-8"));
		out.flush();
		out.close();
		logger.info("upload.do end");
    }
	
    public Object doupload(HttpServletRequest request,HttpServletResponse response)
    {
    	logger.info("upload.do  start...");
    	String server = SysConstant.getPropertiy("imageServer");
    	//文件保存目录路径
    	String savePath = request.getSession().getServletContext().getRealPath("/") + "/editor/attached/";

    	savePath =SysConstant.getPropertiy("imagePath");
    	//文件保存目录URL
    	String saveUrl  = SysConstant.getPropertiy("imageServer");
    	
    	
    	//定义允许上传的文件扩展名
    	HashMap<String, String> extMap = new HashMap<String, String>();
    	extMap.put("image", "gif,jpg,jpeg,png,bmp");
    	extMap.put("flash", "swf,flv");
    	extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
    	extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2");
    	
    	//最大文件大小
    	long maxSize = 1000000;

    	response.setContentType("text/html; charset=UTF-8");
    	
    	//检查目录
    	File uploadDir = new File(savePath);
    	if(!uploadDir.isDirectory()){
    		return getError("上传目录不存在。");
    	}
    	//检查目录写权限
    	if(!uploadDir.canWrite()){
    		return getError("上传目录没有写权限。");
    	}
    	
    	String dirName = request.getParameter("dir");
    	if (dirName == null) {
    		dirName = "image";
    	}
    	if(!extMap.containsKey(dirName)){
    		return getError("目录名不正确。");
    	}
    	
    	//创建文件夹 image file flash 
    	savePath += dirName + "/";
    	saveUrl += dirName + "/";
    	File saveDirFile = new File(savePath);
    	if (!saveDirFile.exists()) {
    		saveDirFile.mkdirs();
    	}
    	
    	//创建年份文件夹
    	SimpleDateFormat sdf = new SimpleDateFormat("yyyy");
    	String year = sdf.format(new Date());
    	savePath += year + "/";
    	saveUrl += year + "/";
    	File yeardirFile = new File(savePath);
    	if (!yeardirFile.exists()) {
    		yeardirFile.mkdirs();
    	}
    	
    	//创建文件夹  子文件夹  日期
    	 sdf = new SimpleDateFormat("yyyyMMdd");
    	String ymd = sdf.format(new Date());
    	savePath += ymd + "/";
    	saveUrl += ymd + "/";
    	File dirFile = new File(savePath);
    	if (!dirFile.exists()) {
    		dirFile.mkdirs();
    	}
    	
    	FileItemFactory factory = new DiskFileItemFactory();
    	ServletFileUpload upload = new ServletFileUpload(factory);
    	upload.setHeaderEncoding("UTF-8");
    	List<?> items = null;
		try {
			items = upload.parseRequest(request);
		} catch (FileUploadException e1) {
			logger.error("文件上传失败",e1);
			return getError("文件上传失败");
		}
    	Iterator<?> itr = items.iterator();
    	
    	while (itr.hasNext()) {
    		FileItem item = (FileItem) itr.next();
    		String fileName = item.getName();
    		long fileSize = item.getSize();
    		if (!item.isFormField()) {
    			//检查文件大小
    			if(fileSize > maxSize){
    				return getError("上传文件大小超过限制。");
    			}
    			//检查扩展名
    			String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
    			if(!Arrays.<String>asList(extMap.get(dirName).split(",")).contains(fileExt)){
    				return getError("上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。");
    			}

    			SimpleDateFormat df = new SimpleDateFormat("yyyyMMdd");
    			String newFileName = df.format(new Date()) + "_" +  new Random().nextInt(1000) + "." + fileExt;
    			try{
    				File uploadedFile = new File(savePath, newFileName);
    				item.write(uploadedFile);
    			}catch(Exception e){
    				return getError("上传文件失败。");
    			}

    			Map<String,Object> vo = new HashMap<String,Object>();
		        vo.put("error", 0);
				vo.put("url", saveUrl + newFileName);
		    	return vo;
    		}
    	}
    	return getError("上传文件失败。");
    }
	
	
	private Object getError(String message) {
		Map<String,Object> obj = new HashMap<String,Object>();
		obj.put("error", 1);
		obj.put("message", message);
		return obj;
	}
	
	
	@ResponseBody
	@RequestMapping(value="fileManager.do")
    public Object fileManager(HttpServletRequest request,HttpServletResponse response) throws Exception
    {
		
		//根目录路径，可以指定绝对路径，比如 /var/www/attached/
		//String rootPath = request.getSession().getServletContext().getRealPath("/") + "/editor/attached/";
		String rootPath = SysConstant.getPropertiy("imagePath");
		
		//根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/
		//String rootUrl  = server+request.getContextPath() + "/editor/attached/";
		String rootUrl = SysConstant.getPropertiy("imageServer");
		
		//图片扩展名
		String[] fileTypes = new String[]{"gif", "jpg", "jpeg", "png", "bmp"};
		String dirName = request.getParameter("dir");
		if (dirName != null) {
			if(!Arrays.<String>asList(new String[]{"image", "flash", "media", "file"}).contains(dirName)){
				return ("Invalid Directory name.");
			}
			rootPath += dirName + "/";
			rootUrl += dirName + "/";
			File saveDirFile = new File(rootPath);
			if (!saveDirFile.exists()) {
				saveDirFile.mkdirs();
			}
		}
		
		//根据path参数，设置各路径和URL
		String path = request.getParameter("path") != null ? request.getParameter("path") : "";
		String currentPath = rootPath + path;
		String currentUrl = rootUrl + path;
		String currentDirPath = path;
		String moveupDirPath = "";
		if (!"".equals(path)) {
			String str = currentDirPath.substring(0, currentDirPath.length() - 1);
			moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0, str.lastIndexOf("/") + 1) : "";
		}
		
		//排序形式，name or size or type
		String order = request.getParameter("order") != null ? request.getParameter("order").toLowerCase() : "name";

		//不允许使用..移动到上一级目录
		if (path.indexOf("..") >= 0) {
			return ("Access is not allowed.");
		}
		
		//最后一个字符不是/
		if (!"".equals(path) && !path.endsWith("/")) {
			return("Parameter is not valid.");
		}
		
		//目录不存在或不是目录
		File currentPathFile = new File(currentPath);
		if(!currentPathFile.isDirectory()){
			return("Directory does not exist.");
		}
		
		//遍历目录取的文件信息
		List<Hashtable<String,Object>> fileList = new ArrayList<Hashtable<String,Object>>();
		if(currentPathFile.listFiles() != null) {
			for (File file : currentPathFile.listFiles()) {
				Hashtable<String, Object> hash = new Hashtable<String, Object>();
				String fileName = file.getName();
				if(file.isDirectory()) {
					hash.put("is_dir", true);
					hash.put("has_file", (file.listFiles() != null));
					hash.put("filesize", 0L);
					hash.put("is_photo", false);
					hash.put("filetype", "");
				} else if(file.isFile()){
					String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
					hash.put("is_dir", false);
					hash.put("has_file", false);
					hash.put("filesize", file.length());
					hash.put("is_photo", Arrays.<String>asList(fileTypes).contains(fileExt));
					hash.put("filetype", fileExt);
				}
				hash.put("filename", fileName);
				hash.put("datetime", new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file.lastModified()));
				fileList.add(hash);
			}
		}
		
		if ("size".equals(order)) {
			Collections.sort(fileList, new SizeComparator());
		} else if ("type".equals(order)) {
			Collections.sort(fileList, new TypeComparator());
		} else {
			Collections.sort(fileList, new NameComparator());
		}
		
		Map<String,Object> result = new HashMap<String,Object>();
		result.put("moveup_dir_path", moveupDirPath);
		result.put("current_dir_path", currentDirPath);
		result.put("current_url", currentUrl);
		result.put("total_count", fileList.size());
		result.put("file_list", fileList);

		response.setContentType("application/json; charset=UTF-8");
		return result ;
		
    }
}


 class NameComparator implements Comparator<Hashtable<String,Object>> {
	public int compare(Hashtable<String,Object> hashA, Hashtable<String,Object> hashB) {
		 
		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
			return -1;
		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
			return 1;
		} else {
			return ((String)hashA.get("filename")).compareTo((String)hashB.get("filename"));
		}
	}
}
 
 class SizeComparator implements Comparator<Hashtable<String,Object>> {
	public int compare(Hashtable<String,Object> hashA, Hashtable<String,Object> hashB) {
		
		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
			return -1;
		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
			return 1;
		} else {
			if (((Long)hashA.get("filesize")) > ((Long)hashB.get("filesize"))) {
				return 1;
			} else if (((Long)hashA.get("filesize")) < ((Long)hashB.get("filesize"))) {
				return -1;
			} else {
				return 0;
			}
		}
	}
}
 
 class TypeComparator implements Comparator<Hashtable<String,Object>> {
	public int compare(Hashtable<String,Object> hashA, Hashtable<String,Object> hashB) {
		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
			return -1;
		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
			return 1;
		} else {
			return ((String)hashA.get("filetype")).compareTo((String)hashB.get("filetype"));
		}
	}
}
